home *** CD-ROM | disk | FTP | other *** search
-
-
-
- CCCCLLLLAAAAIIIICCCC1111((((3333SSSS)))) CCCCLLLLAAAAIIIICCCC1111((((3333SSSS))))
-
-
-
- NNNNAAAAMMMMEEEE
- CLAIC1 - applie one step of incremental condition estimation in its
- simplest version
-
- SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
- SUBROUTINE CLAIC1( JOB, J, X, SEST, W, GAMMA, SESTPR, S, C )
-
- INTEGER J, JOB
-
- REAL SEST, SESTPR
-
- COMPLEX C, GAMMA, S
-
- COMPLEX W( J ), X( J )
-
- IIIIMMMMPPPPLLLLEEEEMMMMEEEENNNNTTTTAAAATTTTIIIIOOOONNNN
- These routines are part of the SCSL Scientific Library and can be loaded
- using either the -lscs or the -lscs_mp option. The -lscs_mp option
- directs the linker to use the multi-processor version of the library.
-
- When linking to SCSL with -lscs or -lscs_mp, the default integer size is
- 4 bytes (32 bits). Another version of SCSL is available in which integers
- are 8 bytes (64 bits). This version allows the user access to larger
- memory sizes and helps when porting legacy Cray codes. It can be loaded
- by using the -lscs_i8 option or the -lscs_i8_mp option. A program may use
- only one of the two versions; 4-byte integer and 8-byte integer library
- calls cannot be mixed.
-
- PPPPUUUURRRRPPPPOOOOSSSSEEEE
- CLAIC1 applies one step of incremental condition estimation in its
- simplest version: Let x, twonorm(x) = 1, be an approximate singular
- vector of an j-by-j lower triangular matrix L, such that
- twonorm(L*x) = sest
- Then CLAIC1 computes sestpr, s, c such that
- the vector
- [ s*x ]
- xhat = [ c ]
- is an approximate singular vector of
- [ L 0 ]
- Lhat = [ w' gamma ]
- in the sense that
- twonorm(Lhat*xhat) = sestpr.
-
- Depending on JOB, an estimate for the largest or smallest singular value
- is computed.
-
- Note that [s c]' and sestpr**2 is an eigenpair of the system
-
- diag(sest*sest, 0) + [alpha gamma] * [ conjg(alpha) ]
- [ conjg(gamma) ]
-
- where alpha = conjg(x)'*w.
-
-
-
- PPPPaaaaggggeeee 1111
-
-
-
-
-
-
- CCCCLLLLAAAAIIIICCCC1111((((3333SSSS)))) CCCCLLLLAAAAIIIICCCC1111((((3333SSSS))))
-
-
-
- AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
- JOB (input) INTEGER
- = 1: an estimate for the largest singular value is computed.
- = 2: an estimate for the smallest singular value is computed.
-
- J (input) INTEGER
- Length of X and W
-
- X (input) COMPLEX array, dimension (J)
- The j-vector x.
-
- SEST (input) REAL
- Estimated singular value of j by j matrix L
-
- W (input) COMPLEX array, dimension (J)
- The j-vector w.
-
- GAMMA (input) COMPLEX
- The diagonal element gamma.
-
- SESTPR (output) REAL
- Estimated singular value of (j+1) by (j+1) matrix Lhat.
-
- S (output) COMPLEX
- Sine needed in forming xhat.
-
- C (output) COMPLEX
- Cosine needed in forming xhat.
-
- SSSSEEEEEEEE AAAALLLLSSSSOOOO
- INTRO_LAPACK(3S), INTRO_SCSL(3S)
-
- This man page is available only online.
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- PPPPaaaaggggeeee 2222
-
-
-
-